home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / extenbat.arc / BACKUP.BAT next >
DOS Batch File  |  1983-07-01  |  2KB  |  78 lines
  1. type bat.com
  2. bat    **  Starting utility to backup BAT diskette  **
  3.  
  4. BAT * READ SERIAL NUMBER FROM PROGRAM HEADER
  5. bat -serial
  6. bat    readscrn %a %b %c        |* get the serial # from the screen
  7. bat    if %c <> (C)opyright goto -serial |* loop until it's the proper line.
  8.  
  9. BAT * GIVE INTRO TO THIS BACKUP PROGRAM.
  10.  
  11. bat cls type YOUR PROGRAM SERIAL NUMBER IS %a
  12. bat begtype
  13.  
  14. Remember this serial number if you have
  15. specific questions or problems.
  16.  
  17. This program is user supported.  Private
  18. users may contribute ($30 suggested) if
  19. you feal this program is of value to
  20. you.  The $30 license fee (per system)
  21. is required for COMMERCIAL USERS if used
  22. in a place of business or incorporated
  23. into another product.
  24.  
  25. You may contact Seaware by writing
  26.     SEAWARE CORP.
  27.     P.O. BOX 1656
  28.     DELRAY BEACH, FL  33444
  29.  
  30. end
  31. bat inkey Press any key to continue . . .
  32.  
  33. bat * INTRODUCE FIRST SECTION OF BACKUP
  34.  
  35. bat cls begtype
  36. ════ Backup proceedure will follow ═══
  37.  
  38. To backup the program diskette supplied
  39. by Seaware, you must have a spare
  40. diskette with about 60,000 bytes of
  41. space remaining on it.    The program and
  42. all utilities will be copied to your
  43. diskette.
  44.  
  45. ON A DUAL DISKETTE SYSTEM:
  46.  
  47. Make sure the master supplied by Seaware
  48. is in drive A and your spare is in drive
  49. B.
  50.  
  51. ON A SINGLE DISKETTE SYSTEM:
  52.  
  53. Use the Seaware master as diskette A and
  54. your spare as diskette B. Follow the
  55. prompts suplied by DOS to switch
  56. diskettes.
  57.  
  58. end
  59. bat    read Continue? (Y/N) %a     |* get answer
  60. bat    %a = %a $ 1 1            |* isolate 1st char in case replied "yes"
  61. bat    if %a <> y exit
  62.  
  63. bat * STACK NECESSARY COPIES FOR DOS TO PICK UP.
  64.  
  65. bat    begstack
  66. rem    BACKUP PROCESS STARTING . . . .
  67.  
  68. copy    A:BAT.COM    B:
  69. copy    A:BATDOC.COM    B:
  70. copy    A:BATDEMO.BAT    B:
  71. copy    A:BACKUP.BAT    B:
  72. copy    A:VCOPY.BAT    B:
  73. copy    A:EDIT.BAT    B:
  74. copy    A:TELE.BAT    B:
  75.  
  76. rem    BACKUP PROCESS HAS COMPLETED . .
  77. end
  78.